﻿Imports System.Reflection

Public Class Plugin
    Implements UCBase.I_Plugin
    Private DevList As New List(Of UCBase.UCSDevice)
    Public ReadOnly Property Devices() As System.Collections.Generic.List(Of UCBase.UCSDevice) Implements UCBase.I_Plugin.Devices
        Get
            Return DevList
        End Get
    End Property
    Public WriteOnly Property Resources() As UCBase.ResourceManager Implements UCBase.I_Plugin.Resources
        Set(ByVal value As UCBase.ResourceManager)

        End Set
    End Property
    Public Sub Unload() Implements UCBase.I_Plugin.Unload
        Me.Finalize()
    End Sub
    Protected Overrides Sub Finalize()
        MyBase.Finalize()
    End Sub
    Public Function GetDevice(ByVal Name As String) As System.Windows.Forms.Control Implements UCBase.I_Plugin.GetDevice
        'If Name = "DeviceName" Then Return New Device 'Get Control from Reference Name
        If Name = "Image2Way" Then Return New Img2Way 'Get Control from Reference Name
        If Name = "Image3Way" Then Return New Img3Way 'Get Control from Reference Name
        Return Nothing
    End Function

    Public Sub New()
        'DevList.Add(New UCBase.UniCamDevice("Friendly Name", "Name", "Menu", "Tooltip"))
        DevList.Add(New UCBase.UCSDevice("2 Way Image", "Image2Way", "Splitters", "2 Way Image Splitter"))
        DevList.Add(New UCBase.UCSDevice("3 Way Image", "Image3Way", "Splitters", "3 Way Image Splitter"))
    End Sub
End Class
